object FormRelProdutos: TFormRelProdutos
  Left = 103
  Top = 83
  Width = 481
  Height = 267
  Caption = 'Relat'#243'rio de Produtos'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBoxProduto: TGroupBox
    Left = 8
    Top = 168
    Width = 457
    Height = 57
    Caption = 'Produto'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 5
    Visible = False
    object Label4: TLabel
      Left = 8
      Top = 25
      Width = 60
      Height = 16
      Caption = 'Selcionar:'
    end
    object StaticTextCliente: TStaticText
      Left = 80
      Top = 16
      Width = 353
      Height = 25
      AutoSize = False
      BorderStyle = sbsSingle
      Caption = 'Clique para escolher o produto'
      Color = clWhite
      ParentColor = False
      TabOrder = 0
    end
  end
  object GroupBoxData: TGroupBox
    Left = 8
    Top = 80
    Width = 457
    Height = 89
    Caption = 'Data da Compra'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    Visible = False
    object Label2: TLabel
      Left = 8
      Top = 60
      Width = 64
      Height = 16
      Caption = 'Data Final:'
    end
    object Label1: TLabel
      Left = 8
      Top = 25
      Width = 69
      Height = 16
      Caption = 'Data Inicial:'
    end
    object DateTimePicker2: TDateTimePicker
      Left = 87
      Top = 52
      Width = 186
      Height = 24
      Date = 39018.958266944400000000
      Time = 39018.958266944400000000
      TabOrder = 0
    end
    object DateTimePicker1: TDateTimePicker
      Left = 87
      Top = 16
      Width = 186
      Height = 24
      Date = 39018.958266944400000000
      Time = 39018.958266944400000000
      TabOrder = 1
    end
  end
  object RadioGroupRelatorio: TRadioGroup
    Left = 8
    Top = 0
    Width = 457
    Height = 73
    Caption = 'Relat'#243'rio'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemIndex = 0
    Items.Strings = (
      'Rela'#231#227'o de Produtos')
    ParentFont = False
    TabOrder = 0
    OnClick = RadioGroupRelatorioClick
  end
  object RadioGroupOrdem: TRadioGroup
    Left = 7
    Top = 80
    Width = 458
    Height = 81
    Caption = 'Ordem'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemIndex = 0
    Items.Strings = (
      'C'#243'digo'
      'Nome')
    ParentFont = False
    TabOrder = 1
  end
  object BitBtn1: TBitBtn
    Left = 130
    Top = 196
    Width = 76
    Height = 25
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    OnClick = BitBtn1Click
    Kind = bkOK
  end
  object BitBtn2: TBitBtn
    Left = 250
    Top = 196
    Width = 92
    Height = 25
    Caption = 'Cancelar'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 4
    OnClick = BitBtn2Click
    Kind = bkCancel
  end
  object QueryRelCliente: TQuery
    DatabaseName = 'DBPizza'
    SQL.Strings = (
      'select * from syspizza.cliente order by nm')
    Left = 352
    Top = 112
  end
  object QueryCliente: TQuery
    DatabaseName = 'DBPizza'
    SQL.Strings = (
      'select * from syspizza.cliente'
      'where id = :p_id'
      'or telefone1 = :p_telefone1'
      'or telefone2 = :p_telefone2'
      'or telefone3 = :p_telefone3')
    Left = 328
    Top = 256
    ParamData = <
      item
        DataType = ftInteger
        Name = 'p_id'
        ParamType = ptUnknown
      end
      item
        DataType = ftString
        Name = 'p_telefone1'
        ParamType = ptUnknown
      end
      item
        DataType = ftString
        Name = 'p_telefone2'
        ParamType = ptUnknown
      end
      item
        DataType = ftString
        Name = 'p_telefone3'
        ParamType = ptUnknown
      end>
  end
end
